home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / Window / c / Help < prev    next >
Text File  |  1995-07-28  |  2KB  |  57 lines

  1. /*
  2.     ####             #    #     # #
  3.     #   #            #    #       #          The FreeWare C library for 
  4.     #   #  ##   ###  #  # #     # ###             RISC OS machines
  5.     #   # #  # #     # #  #     # #  #   ___________________________________
  6.     #   # ####  ###  ##   #     # #  #                                      
  7.     #   # #        # # #  #     # #  #    Please refer to the accompanying
  8.     ####   ### ####  #  # ##### # ###    documentation for conditions of use
  9.     ________________________________________________________________________
  10.  
  11.     File:    Window.Help.c
  12.     Author:  Copyright © 1992 Jason Williams
  13.     Version: 1.00 (09 Apr 1992)
  14.     Purpose: Adds an event handler that replies to HelpRequest messages
  15.              by taking the window's template name and icon number, and
  16.              looking up (e.g. "template.1") in the Msgs file.
  17. */
  18.  
  19. #include <stdio.h>
  20. #include "string.h"
  21.  
  22. #include "DeskLib:Event.h"
  23. #include "DeskLib:Window.h"
  24. #include "DeskLib:Msgs.h"
  25. #include "DeskLib:WimpSWIs.h"
  26.  
  27.  
  28.  
  29. extern BOOL Window_HelpHandler(event_pollblock *event, void *reference)
  30. {
  31.   char template[16], number[16];
  32.   message_destinee replyto;
  33.  
  34.   UNUSED( reference);
  35.   
  36.   if (event->data.message.header.action == message_HELPREQUEST)
  37.   {
  38.     Window_ParentName(event->data.message.data.helprequest.where.window,
  39.                       template);
  40.     template[8] = '\0';         /* tags can't be more than 8 characters long */
  41.  
  42.     sprintf(number, ".%d", event->data.message.data.helprequest.where.icon);
  43.     strcat(template, number);
  44.  
  45.     if (Msgs_Lookup(template, event->data.message.data.helpreply.text, 200))
  46.     {
  47.       event->data.message.header.yourref = event->data.message.header.myref;
  48.       event->data.message.header.action = message_HELPREPLY;
  49.       event->data.message.header.size = 256;
  50.       replyto = event->data.message.header.sender;
  51.       Wimp_SendMessage( event_SENDWANTACK, &event->data.message, replyto, 0);
  52.       return(TRUE);  /* Only claim message event if successfully reply to it */
  53.     }
  54.   }
  55.   return(FALSE);
  56. }
  57.